﻿Public Class InformeCampoBE

    Private iCodigo As String
    Private strSupervisor As String
    Private strReferencia As String
    Private iCantidadHospedajes As Integer
    Private iCantidadRestaurantes As Integer
    Private strTransporte As String
    Private strObservaciones As String
    Private strEstado As String
    Private strUsuario As String
    Private strFechaCreacion As String
    Private objCiudad As CiudadBE
    Private listaDetalleInformeCampo As List(Of DetalleInformeCampoBE)

    'Solo para consulta
    Dim strFInicio As String
    Dim strFFin As String


    Sub New()
        objCiudad = New CiudadBE()
    End Sub

    Public Property FechaCreacion As String
        Get
            Return strFechaCreacion
        End Get
        Set(ByVal value As String)
            strFechaCreacion = value
        End Set
    End Property

    Public Property Codigo() As Integer
        Get
            Return iCodigo
        End Get
        Set(ByVal value As Integer)
            iCodigo = value
        End Set
    End Property

    Public Property Ciudad() As CiudadBE
        Get
            Return objCiudad
        End Get
        Set(ByVal value As CiudadBE)
            objCiudad = value
        End Set
    End Property

    Public Property ListaDetalle() As List(Of DetalleInformeCampoBE)
        Get
            Return listaDetalleInformeCampo
        End Get
        Set(ByVal value As List(Of DetalleInformeCampoBE))
            listaDetalleInformeCampo = value
        End Set
    End Property

    Public Property Supervisor() As String
        Get
            Return strSupervisor
        End Get
        Set(ByVal value As String)
            strSupervisor = value
        End Set
    End Property

    Public Property Referencia() As String
        Get
            Return strReferencia
        End Get
        Set(ByVal value As String)
            strReferencia = value
        End Set
    End Property

    Public Property CantidadHospedajes() As Integer
        Get
            Return iCantidadHospedajes
        End Get
        Set(ByVal value As Integer)
            iCantidadHospedajes = value
        End Set
    End Property

    Public Property CantidadRestaurantes() As Integer
        Get
            Return iCantidadRestaurantes
        End Get
        Set(ByVal value As Integer)
            iCantidadRestaurantes = value
        End Set
    End Property

    Public Property Transporte() As String
        Get
            Return strTransporte
        End Get
        Set(ByVal value As String)
            strTransporte = value
        End Set
    End Property

    Public Property Observaciones() As String
        Get
            Return strObservaciones
        End Get
        Set(ByVal value As String)
            strObservaciones = value
        End Set
    End Property

    Public Property Estado() As String
        Get
            Return strEstado
        End Get
        Set(ByVal value As String)
            strEstado = value
        End Set
    End Property

    Public Property Usuario() As String
        Get
            Return strUsuario
        End Get
        Set(ByVal value As String)
            strUsuario = value
        End Set
    End Property

    'Solo para consulta
    Public Property FechaInicio() As String
        Get
            Return strFInicio
        End Get
        Set(ByVal value As String)
            strFInicio = value
        End Set
    End Property

    Public Property FechaFin() As String
        Get
            Return strFFin
        End Get
        Set(ByVal value As String)
            strFFin = value
        End Set
    End Property

End Class
